(define first
  (native_function "
    Proc.new do |argument, interpreter|
      arg1 = interpreter.evaluate(argument[0])
      if arg1.is_a? Array      
        arg1[0]
      elsif arg1.is_a? String
        arg1[0,1]
      end
    end
  "))
